home *** CD-ROM | disk | FTP | other *** search
/ Horoscope Companion: Leo / Horoscope Companion: Leo.iso / pc / leo / efa.dir / 00041.ls < prev    next >
Encoding:
Text File  |  1996-10-08  |  648 b   |  29 lines
  1. on startMovie
  2.   cursor(4)
  3.   setupMovie()
  4. end
  5.  
  6. on stopMovie
  7.   put EMPTY into field "user's editable text"
  8.   hCleanupSprites()
  9. end
  10.  
  11. on idle
  12.   CheckForRollovers(the rollOver)
  13. end
  14.  
  15. on setupMovie
  16.   global gWheelSprite, gWheelSelection, gWheelBlinkOn, gEditableTextSprite
  17.   set gWheelSprite to 2
  18.   puppetSprite(gWheelSprite, 1)
  19.   set gWheelSelection to "1"
  20.   set gWheelBlinkOn to 0
  21.   set gEditableTextSprite to 5
  22.   if the machineType = 256 then
  23.     set the textFont of member "user's editable text" to "arial"
  24.   else
  25.     set the textFont of member "user's editable text" to "geneva"
  26.   end if
  27.   set the textSize of member "user's editable text" to 12
  28. end
  29.